home *** CD-ROM | disk | FTP | other *** search
/ PC World 2006 February / PCWorld_2006-02_cd.bin / software / vyzkuste / tnt / tnt.exe / {app} / plugins / Cursor.ttp < prev    next >
Encoding:
INI File  |  2005-03-15  |  774 b   |  40 lines
  1. [SETTINGS]
  2. Category=Windows Tweaks::System::Cursor Properties
  3. Caption=Cursor Properties
  4. version=1.0
  5. OSVERSION=2000,ME,XP,2003
  6. #=Cursor Width is 1 pixel by default.\nYou can make the cursor wider by changing the slider position.
  7. #=\nValue recommended is 2
  8. Author=
  9.  
  10.  
  11. [INTERFACE]
  12. TYPE=multi
  13. Type0=slider
  14. Text0=Width in Pixel(s)
  15. style0 =1,5
  16.  
  17. [EXPORT]
  18. val0=HKCU\Control Panel\Desktop\CaretWidth
  19.  
  20. [SCRIPT]
  21. Dim strkey,str1
  22. strkey="HKCU\Control Panel\Desktop\"
  23. str1="CaretWidth"
  24.  
  25. Sub OnInit()
  26.  Dim i
  27.  i=RegReadValue(strkey & str1)
  28.  SetItemText 0,i 
  29. End Sub
  30.  
  31. Sub OnApply(x,y)
  32.  Dim i
  33.  i=GetItemText(0)
  34.  If i<1 or i>100 then
  35.     Msg "Enter a value between 1 and 5",0
  36.  else
  37.     Call RegWriteValue(strkey & str1,i,2)
  38.     Call Logoff
  39.  end if
  40. End Sub